home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1993-02-26 | 7.0 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 53 | 68 6f 77 48 61 6e 64 73 |..... >S|howHands|
|00000010| 0d 00 14 05 3a 0d 00 1e | 22 f4 20 41 75 74 68 6f |....:...|". Autho|
|00000020| 72 20 3a 20 4a 6f 68 6e | 20 43 2e 20 57 61 6c 6c |r : John| C. Wall|
|00000030| 61 63 65 20 28 43 29 0d | 00 28 1a f4 20 44 61 74 |ace (C).|.(.. Dat|
|00000040| 65 20 20 20 3a 20 32 36 | 20 46 65 62 20 31 39 39 |e : 26| Feb 199|
|00000050| 33 0d 00 32 05 3a 0d 00 | 3c 18 ee 20 85 20 e7 20 |3..2.:..|<.. . . |
|00000060| a4 77 69 6d 70 65 72 72 | 6f 72 20 8c 20 e0 0d 00 |.wimperr|or . ...|
|00000070| 46 05 3a 0d 00 50 30 de | 20 73 6f 75 72 63 65 25 |F.:..P0.| source%|
|00000080| 20 26 34 30 30 2c 62 6c | 6f 63 6b 25 20 26 32 30 | &400,bl|ock% &20|
|00000090| 30 2c 74 78 25 20 33 32 | 2c 65 72 72 5f 62 6c 6b |0,tx% 32|,err_blk|
|000000a0| 20 36 34 0d 00 5a 34 de | 20 6c 69 6e 65 24 28 34 | 64..Z4.| line$(4|
|000000b0| 30 29 2c 68 61 6e 64 24 | 28 33 2c 33 29 2c 63 24 |0),hand$|(3,3),c$|
|000000c0| 28 31 32 29 2c 73 24 28 | 33 29 2c 70 24 28 33 29 |(12),s$(|3),p$(3)|
|000000d0| 2c 62 24 28 34 30 29 0d | 00 64 12 de 20 73 6f 75 |,b$(40).|.d.. sou|
|000000e0| 72 63 65 24 28 33 30 30 | 29 0d 00 6e 05 3a 0d 00 |rce$(300|)..n.:..|
|000000f0| 78 26 e3 20 4a 25 3d 30 | 20 b8 20 37 3a 63 24 28 |x&. J%=0| . 7:c$(|
|00000100| 4a 25 29 3d 22 20 22 2b | c3 28 4a 25 2b 32 29 3a |J%)=" "+|.(J%+2):|
|00000110| ed 20 4a 25 0d 00 82 3d | 63 24 28 38 29 3d 22 20 |. J%...=|c$(8)=" |
|00000120| 54 22 3a 63 24 28 39 29 | 3d 22 20 4a 22 3a 63 24 |T":c$(9)|=" J":c$|
|00000130| 28 31 30 29 3d 22 20 51 | 22 3a 63 24 28 31 31 29 |(10)=" Q|":c$(11)|
|00000140| 3d 22 20 4b 22 3a 63 24 | 28 31 32 29 3d 22 20 41 |=" K":c$|(12)=" A|
|00000150| 22 0d 00 8c 1c 73 24 28 | 29 3d 22 43 3a 22 2c 22 |"....s$(|)="C:","|
|00000160| 44 3a 22 2c 22 48 3a 22 | 2c 22 53 3a 22 0d 00 96 |D:","H:"|,"S:"...|
|00000170| 1c 70 24 28 29 3d 22 20 | 53 22 2c 22 20 57 22 2c |.p$()=" |S"," W",|
|00000180| 22 20 4e 22 2c 22 20 45 | 22 0d 00 a0 27 62 24 28 |" N"," E|"...'b$(|
|00000190| 30 29 3d 22 20 72 64 22 | 3a 62 24 28 31 29 3d 22 |0)=" rd"|:b$(1)="|
|000001a0| 20 64 62 22 3a 62 24 28 | 32 29 3d 22 20 2d 20 22 | db":b$(|2)=" - "|
|000001b0| 0d 00 aa 1b 65 77 74 72 | 69 63 6b 24 3d 22 22 3a |....ewtr|ick$="":|
|000001c0| 6e 73 74 72 69 63 6b 24 | 3d 22 22 0d 00 b4 05 3a |nstrick$|=""....:|
|000001d0| 0d 00 be 08 4b 25 3d 33 | 0d 00 c8 0e e3 20 4a 25 |....K%=3|..... J%|
|000001e0| 3d 31 20 b8 20 37 0d 00 | d2 1d 20 62 24 28 4b 25 |=1 . 7..|.. b$(K%|
|000001f0| 29 3d 22 20 22 2b c3 4a | 25 2b 22 43 22 3a 4b 25 |)=" "+.J|%+"C":K%|
|00000200| 2b 3d 31 0d 00 dc 1d 20 | 62 24 28 4b 25 29 3d 22 |+=1.... |b$(K%)="|
|00000210| 20 22 2b c3 4a 25 2b 22 | 44 22 3a 4b 25 2b 3d 31 | "+.J%+"|D":K%+=1|
|00000220| 0d 00 e6 1d 20 62 24 28 | 4b 25 29 3d 22 20 22 2b |.... b$(|K%)=" "+|
|00000230| c3 4a 25 2b 22 48 22 3a | 4b 25 2b 3d 31 0d 00 f0 |.J%+"H":|K%+=1...|
|00000240| 1d 20 62 24 28 4b 25 29 | 3d 22 20 22 2b c3 4a 25 |. b$(K%)|=" "+.J%|
|00000250| 2b 22 53 22 3a 4b 25 2b | 3d 31 0d 00 fa 1d 20 62 |+"S":K%+|=1.... b|
|00000260| 24 28 4b 25 29 3d 22 20 | 22 2b c3 4a 25 2b 22 4e |$(K%)=" |"+.J%+"N|
|00000270| 22 3a 4b 25 2b 3d 31 0d | 01 04 08 ed 20 4a 25 0d |":K%+=1.|.... J%.|
|00000280| 01 0e 05 3a 0d 01 18 0c | 6c 69 6e 65 73 25 3d 30 |...:....|lines%=0|
|00000290| 0d 01 22 0b 71 75 69 74 | 25 3d a3 0d 01 2c 05 3a |..".quit|%=...,.:|
|000002a0| 0d 01 36 3b c8 99 20 22 | 57 69 6d 70 5f 49 6e 69 |..6;.. "|Wimp_Ini|
|000002b0| 74 69 61 6c 69 73 65 22 | 2c 32 30 30 2c 26 34 42 |tialise"|,200,&4B|
|000002c0| 35 33 34 31 35 34 2c 22 | 53 68 6f 77 20 48 61 6e |534154,"|Show Han|
|000002d0| 64 73 22 20 b8 20 74 61 | 73 6b 25 0d 01 40 05 3a |ds" . ta|sk%..@.:|
|000002e0| 0d 01 4a 21 77 6c 69 73 | 74 25 3d a4 63 72 65 61 |..J!wlis|t%=.crea|
|000002f0| 74 65 5f 77 69 6e 64 6f | 77 28 62 6c 6f 63 6b 25 |te_windo|w(block%|
|00000300| 29 0d 01 54 13 62 6c 6f | 63 6b 25 21 30 3d 77 6c |)..T.blo|ck%!0=wl|
|00000310| 69 73 74 25 0d 01 5e 22 | c8 99 22 57 69 6d 70 5f |ist%..^"|.."Wimp_|
|00000320| 47 65 74 57 69 6e 64 6f | 77 49 6e 66 6f 22 2c 2c |GetWindo|wInfo",,|
|00000330| 62 6c 6f 63 6b 25 0d 01 | 68 1f c8 99 22 57 69 6d |block%..|h..."Wim|
|00000340| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00000350| 6c 6f 63 6b 25 0d 01 72 | 18 f4 20 50 52 4f 43 72 |lock%..r|.. PROCr|
|00000360| 65 64 72 61 77 28 77 6c | 69 73 74 25 29 0d 01 7c |edraw(wl|ist%)..||
|00000370| 05 3a 0d 01 86 05 f5 0d | 01 90 28 20 c8 99 20 22 |.:......|..( .. "|
|00000380| 57 69 6d 70 5f 50 6f 6c | 6c 22 2c 26 33 31 2c 62 |Wimp_Pol|l",&31,b|
|00000390| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|000003a0| 01 9a 11 20 c8 8e 20 72 | 65 61 73 6f 6e 25 20 ca |... .. r|eason% .|
|000003b0| 0d 01 a4 17 20 20 c9 20 | 31 20 20 20 20 20 3a 20 |.... . |1 : |
|000003c0| f2 72 65 64 72 61 77 0d | 01 ae 2c 20 20 c9 20 32 |.redraw.|.., . 2|
|000003d0| 20 20 20 20 20 3a 20 c8 | 99 20 22 57 69 6d 70 5f | : .|. "Wimp_|
|000003e0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|000003f0| 63 6b 25 0d 01 b8 17 20 | 20 c9 20 33 20 20 20 20 |ck%.... | . 3 |
|00000400| 20 3a 20 71 75 69 74 25 | 3d b9 0d 01 c2 17 20 20 | : quit%|=..... |
|00000410| c9 20 31 30 20 20 20 20 | 3a 20 f2 73 63 72 6f 6c |. 10 |: .scrol|
|00000420| 6c 0d 01 cc 24 20 20 c9 | 20 31 37 2c 31 38 20 3a |l...$ .| 17,18 :|
|00000430| 20 f2 72 65 63 65 69 76 | 65 5f 6d 73 67 28 62 6c | .receiv|e_msg(bl|
|00000440| 6f 63 6b 25 29 0d 01 d6 | 06 20 cb 0d 01 e0 0b fd |ock%)...|. ......|
|00000450| 20 71 75 69 74 25 0d 01 | ea 21 c8 99 20 22 57 69 | quit%..|.!.. "Wi|
|00000460| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00000470| 2c 62 6c 6f 63 6b 25 0d | 01 f4 27 c8 99 20 22 57 |,block%.|..'.. "W|
|00000480| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 2c 74 |imp_Clos|eDown",t|
|00000490| 61 73 6b 25 2c 26 34 42 | 35 33 34 31 35 34 0d 01 |ask%,&4B|534154..|
|000004a0| fe 05 e0 0d 02 08 05 3a | 0d 02 12 0c dd f2 73 63 |.......:|......sc|
|000004b0| 72 6f 6c 6c 0d 02 1c 0b | ea 20 78 25 2c 79 25 0d |roll....|. x%,y%.|
|000004c0| 02 26 10 78 25 3d 62 6c | 6f 63 6b 25 21 32 30 0d |.&.x%=bl|ock%!20.|
|000004d0| 02 30 10 79 25 3d 62 6c | 6f 63 6b 25 21 32 34 0d |.0.y%=bl|ock%!24.|
|000004e0| 02 3a 12 c8 8e 20 62 6c | 6f 63 6b 25 21 33 32 20 |.:... bl|ock%!32 |
|000004f0| ca 0d 02 44 22 20 c9 20 | 2d 32 20 3a 20 78 25 2d |...D" . |-2 : x%-|
|00000500| 3d 62 6c 6f 63 6b 25 21 | 31 32 2d 62 6c 6f 63 6b |=block%!|12-block|
|00000510| 25 21 34 0d 02 4e 12 20 | c9 20 2d 31 20 3a 20 78 |%!4..N. |. -1 : x|
|00000520| 25 2d 3d 36 34 0d 02 58 | 12 20 c9 20 2b 31 20 3a |%-=64..X|. . +1 :|
|00000530| 20 78 25 2b 3d 36 34 0d | 02 62 22 20 c9 20 2b 32 | x%+=64.|.b" . +2|
|00000540| 20 3a 20 78 25 2b 3d 62 | 6c 6f 63 6b 25 21 31 32 | : x%+=b|lock%!12|
|00000550| 2d 62 6c 6f 63 6b 25 21 | 34 0d 02 6c 05 cb 0d 02 |-block%!|4..l....|
|00000560| 76 12 c8 8e 20 62 6c 6f | 63 6b 25 21 33 36 20 ca |v... blo|ck%!36 .|
|00000570| 0d 02 80 22 20 c9 20 2d | 32 20 3a 20 79 25 2d 3d |..." . -|2 : y%-=|
|00000580| 62 6c 6f 63 6b 25 21 31 | 36 2d 62 6c 6f 63 6b 25 |block%!1|6-block%|
|00000590| 21 38 0d 02 8a 12 20 c9 | 20 2d 31 20 3a 20 79 25 |!8.... .| -1 : y%|
|000005a0| 2d 3d 33 36 0d 02 94 12 | 20 c9 20 2b 31 20 3a 20 |-=36....| . +1 : |
|000005b0| 79 25 2b 3d 33 36 0d 02 | 9e 22 20 c9 20 2b 32 20 |y%+=36..|." . +2 |
|000005c0| 3a 20 79 25 2b 3d 62 6c | 6f 63 6b 25 21 31 36 2d |: y%+=bl|ock%!16-|
|000005d0| 62 6c 6f 63 6b 25 21 38 | 0d 02 a8 05 cb 0d 02 b2 |block%!8|........|
|000005e0| 10 e7 78 25 3c 30 20 8c | 20 78 25 3d 30 0d 02 bc |..x%<0 .| x%=0...|
|000005f0| 10 e7 79 25 3e 30 20 8c | 20 79 25 3d 30 0d 02 c6 |..y%>0 .| y%=0...|
|00000600| 11 79 25 3d 28 79 25 81 | 33 36 29 2a 33 36 0d 02 |.y%=(y%.|36)*36..|
|00000610| d0 10 62 6c 6f 63 6b 25 | 21 32 30 3d 78 25 0d 02 |..block%|!20=x%..|
|00000620| da 10 62 6c 6f 63 6b 25 | 21 32 34 3d 79 25 0d 02 |..block%|!24=y%..|
|00000630| e4 1f c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |...."Wim|p_OpenWi|
|00000640| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 02 ee |ndow",,b|lock%...|
|00000650| 05 e1 0d 02 f8 05 3a 0d | 03 02 2e f4 20 2d 2d 2d |......:.|.... ---|
|00000660| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000680| 2d 2d 2d 2d 2d 0d 03 0c | 05 3a 0d 03 16 15 dd f2 |-----...|.:......|
|00000690| 72 65 63 65 69 76 65 5f | 6d 73 67 28 62 25 29 0d |receive_|msg(b%).|
|000006a0| 03 20 0e c8 8e 20 62 25 | 21 31 36 20 ca 0d 03 2a |. ... b%|!16 ...*|
|000006b0| 12 20 c9 20 30 20 3a 20 | 71 75 69 74 25 3d b9 0d |. . 0 : |quit%=..|
|000006c0| 03 34 1d 20 c9 20 31 20 | 3a 20 62 6c 6f 63 6b 25 |.4. . 1 |: block%|
|000006d0| 21 31 32 3d 62 6c 6f 63 | 6b 25 21 38 0d 03 3e 19 |!12=bloc|k%!8..>.|
|000006e0| 20 20 20 20 20 20 20 20 | 20 20 62 6c 6f 63 6b 25 | | block%|
|000006f0| 21 31 36 3d 32 0d 03 48 | 19 20 20 20 20 20 20 20 |!16=2..H|. |
|00000700| 20 20 20 62 6c 6f 63 6b | 25 21 30 3d 36 30 0d 03 | block|%!0=60..|
|00000710| 52 2c 20 20 20 20 20 20 | 20 20 20 20 24 28 62 6c |R, | $(bl|
|00000720| 6f 63 6b 25 2b 34 34 29 | 3d 22 3c 57 69 6d 70 24 |ock%+44)|="<Wimp$|
|00000730| 53 63 72 61 70 3e 22 2b | bd 30 0d 03 5c 35 20 20 |Scrap>"+|.0..\5 |
|00000740| 20 20 20 20 20 20 20 20 | c8 99 22 57 69 6d 70 5f | |.."Wimp_|
|00000750| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00000760| 62 6c 6f 63 6b 25 2c 62 | 6c 6f 63 6b 25 21 34 0d |block%,b|lock%!4.|
|00000770| 03 66 21 20 c9 20 33 20 | 3a 20 70 61 74 68 24 3d |.f! . 3 |: path$=|
|00000780| a4 63 6f 6e 76 28 62 6c | 6f 63 6b 25 2b 34 34 29 |.conv(bl|ock%+44)|
|00000790| 0d 03 70 1d 20 20 20 20 | 20 20 20 20 20 20 e7 20 |..p. | . |
|000007a0| 62 6c 6f 63 6b 25 21 31 | 32 3d 30 20 8c 0d 03 7a |block%!1|2=0 ...z|
|000007b0| 2e 20 20 20 20 20 20 20 | 20 20 20 20 c8 99 22 4f |. | .."O|
|000007c0| 53 5f 46 69 6c 65 22 2c | 31 37 2c 70 61 74 68 24 |S_File",|17,path$|
|000007d0| 20 b8 20 2c 2c 2c 2c 6c | 65 6e 25 0d 03 84 0f 20 | . ,,,,l|en%.... |
|000007e0| 20 20 20 20 20 20 20 20 | 20 cc 0d 03 8e 1d 20 20 | | ..... |
|000007f0| 20 20 20 20 20 20 20 20 | 20 6c 65 6e 25 3d 62 6c | | len%=bl|
|00000800| 6f 63 6b 25 21 33 36 0d | 03 98 0f 20 20 20 20 20 |ock%!36.|... |
|00000810| 20 20 20 20 20 cd 0d 03 | a2 13 20 20 20 20 20 20 | ...|.. |
|00000820| 20 20 20 20 f2 6c 6f 61 | 64 0d 03 ac 15 20 20 20 | .loa|d.... |
|00000830| 20 20 20 20 20 20 20 f2 | 72 65 64 72 61 77 0d 03 | .|redraw..|
|00000840| b6 05 cb 0d 03 c0 05 e1 | 0d 03 ca 05 3a 0d 03 d4 |........|....:...|
|00000850| 0a dd f2 6c 6f 61 64 0d | 03 de 22 ff 28 22 4c 4f |...load.|..".("LO|
|00000860| 41 44 20 22 2b 70 61 74 | 68 24 2b 22 20 22 2b c3 |AD "+pat|h$+" "+.|
|00000870| 7e 73 6f 75 72 63 65 25 | 29 0d 03 e8 0c f2 70 72 |~source%|).....pr|
|00000880| 6f 63 65 73 73 0d 03 f2 | 11 f2 74 65 78 74 5f 73 |ocess...|..text_s|
|00000890| 74 72 69 6e 67 73 0d 03 | fc 05 e1 0d 04 06 05 3a |trings..|.......:|
|000008a0| 0d 04 10 12 dd f2 74 65 | 78 74 5f 73 74 72 69 6e |......te|xt_strin|
|000008b0| 67 73 0d 04 1a 0e 6c 69 | 6e 65 24 28 29 3d 22 22 |gs....li|ne$()=""|
|000008c0| 0d 04 24 0f 4a 25 3d a9 | 28 70 61 74 68 24 29 0d |..$.J%=.|(path$).|
|000008d0| 04 2e 05 f5 0d 04 38 0a | 20 4a 25 2d 3d 31 0d 04 |......8.| J%-=1..|
|000008e0| 42 16 fd 20 c1 70 61 74 | 68 24 2c 4a 25 2c 31 29 |B.. .pat|h$,J%,1)|
|000008f0| 3d 22 2e 22 0d 04 4c 25 | 6c 69 6e 65 24 28 30 29 |="."..L%|line$(0)|
|00000900| 3d 22 48 61 6e 64 20 20 | 20 3a 20 22 2b c1 70 61 |="Hand | : "+.pa|
|00000910| 74 68 24 2c 4a 25 2b 31 | 29 0d 04 56 18 6c 69 6e |th$,J%+1|)..V.lin|
|00000920| 65 24 28 31 29 3d 22 44 | 65 61 6c 65 72 20 3a 20 |e$(1)="D|ealer : |
|00000930| 22 0d 04 60 17 c8 8e 20 | bb 28 73 6f 75 72 63 65 |"..`... |.(source|
|00000940| 24 28 37 35 29 29 20 ca | 0d 04 6a 1c 20 c9 20 30 |$(75)) .|..j. . 0|
|00000950| 20 3a 20 6c 69 6e 65 24 | 28 31 29 2b 3d 22 53 6f | : line$|(1)+="So|
|00000960| 75 74 68 22 0d 04 74 1b | 20 c9 20 31 20 3a 20 6c |uth"..t.| . 1 : l|
|00000970| 69 6e 65 24 28 31 29 2b | 3d 22 57 65 73 74 22 0d |ine$(1)+|="West".|
|00000980| 04 7e 1c 20 c9 20 32 20 | 3a 20 6c 69 6e 65 24 28 |.~. . 2 |: line$(|
|00000990| 31 29 2b 3d 22 4e 6f 72 | 74 68 22 0d 04 88 1b 20 |1)+="Nor|th".... |
|000009a0| c9 20 33 20 3a 20 6c 69 | 6e 65 24 28 31 29 2b 3d |. 3 : li|ne$(1)+=|
|000009b0| 22 45 61 73 74 22 0d 04 | 92 05 cb 0d 04 9c 05 3a |"East"..|.......:|
|000009c0| 0d 04 a6 08 53 25 3d 33 | 0d 04 b0 08 50 25 3d 30 |....S%=3|....P%=0|
|000009d0| 0d 04 ba 17 68 61 6e 64 | 24 28 50 25 2c 53 25 29 |....hand|$(P%,S%)|
|000009e0| 3d 73 24 28 53 25 29 0d | 04 c4 0f e3 20 4a 25 3d |=s$(S%).|.... J%=|
|000009f0| 32 20 b8 20 35 33 0d 04 | ce 13 20 41 24 3d 73 6f |2 . 53..|.. A$=so|
|00000a00| 75 72 63 65 24 28 4a 25 | 29 0d 04 d8 0d 20 41 25 |urce$(J%|).... A%|
|00000a10| 3d bb 28 41 24 29 0d 04 | e2 16 20 73 75 69 74 25 |=.(A$)..|.. suit%|
|00000a20| 3d 28 41 25 2d 31 29 20 | 81 20 31 33 0d 04 ec 15 |=(A%-1) |. 13....|
|00000a30| 20 76 61 6c 25 3d 28 41 | 25 2d 31 29 20 83 20 31 | val%=(A|%-1) . 1|
|00000a40| 33 0d 04 f6 11 20 c8 95 | 20 53 25 3c 3e 73 75 69 |3.... ..| S%<>sui|
|00000a50| 74 25 0d 05 00 1a 20 20 | 53 25 2d 3d 31 3a e7 20 |t%.... |S%-=1:. |
|00000a60| 53 25 3d 2d 31 20 8c 20 | 53 25 3d 33 0d 05 0a 14 |S%=-1 . |S%=3....|
|00000a70| 20 20 e7 20 53 25 3d 33 | 20 8c 20 50 25 2b 3d 31 | . S%=3| . P%+=1|
|00000a80| 0d 05 14 19 20 20 68 61 | 6e 64 24 28 50 25 2c 53 |.... ha|nd$(P%,S|
|00000a90| 25 29 3d 73 24 28 53 25 | 29 0d 05 1e 06 20 ce 0d |%)=s$(S%|).... ..|
|00000aa0| 05 28 1b 20 68 61 6e 64 | 24 28 50 25 2c 53 25 29 |.(. hand|$(P%,S%)|
|00000ab0| 2b 3d 63 24 28 76 61 6c | 25 29 0d 05 32 08 ed 20 |+=c$(val|%)..2.. |
|00000ac0| 4a 25 0d 05 3c 05 3a 0d | 05 46 08 53 25 3d 33 0d |J%..<.:.|.F.S%=3.|
|00000ad0| 05 50 0e e3 20 4c 25 3d | 32 20 b8 20 35 0d 05 5a |.P.. L%=|2 . 5..Z|
|00000ae0| 3b 20 6c 69 6e 65 24 28 | 4c 25 29 3d c4 32 30 2c |; line$(|L%)=.20,|
|00000af0| 22 20 22 29 2b 68 61 6e | 64 24 28 32 2c 53 25 29 |" ")+han|d$(2,S%)|
|00000b00| 2b c4 33 30 2d a9 28 68 | 61 6e 64 24 28 32 2c 53 |+.30-.(h|and$(2,S|
|00000b10| 25 29 29 2c 22 20 22 29 | 0d 05 64 0a 20 53 25 2d |%))," ")|..d. S%-|
|00000b20| 3d 31 0d 05 6e 08 ed 20 | 4c 25 0d 05 78 08 53 25 |=1..n.. |L%..x.S%|
|00000b30| 3d 33 0d 05 82 0f e3 20 | 4c 25 3d 37 20 b8 20 31 |=3..... |L%=7 . 1|
|00000b40| 30 0d 05 8c 3a 20 6c 69 | 6e 65 24 28 4c 25 29 3d |0...: li|ne$(L%)=|
|00000b50| c4 37 2c 22 20 22 29 2b | 68 61 6e 64 24 28 31 2c |.7," ")+|hand$(1,|
|00000b60| 53 25 29 2b c4 32 34 2d | a9 28 68 61 6e 64 24 28 |S%)+.24-|.(hand$(|
|00000b70| 31 2c 53 25 29 29 2c 22 | 20 22 29 0d 05 96 33 20 |1,S%)),"| ")...3 |
|00000b80| 6c 69 6e 65 24 28 4c 25 | 29 2b 3d 68 61 6e 64 24 |line$(L%|)+=hand$|
|00000b90| 28 33 2c 53 25 29 2b c4 | 31 39 2d a9 28 68 61 6e |(3,S%)+.|19-.(han|
|00000ba0| 64 24 28 33 2c 53 25 29 | 29 2c 22 20 22 29 0d 05 |d$(3,S%)|)," ")..|
|00000bb0| a0 0a 20 53 25 2d 3d 31 | 0d 05 aa 08 ed 20 4c 25 |.. S%-=1|..... L%|
|00000bc0| 0d 05 b4 08 53 25 3d 33 | 0d 05 be 10 e3 20 4c 25 |....S%=3|..... L%|
|00000bd0| 3d 31 32 20 b8 20 31 35 | 0d 05 c8 3b 20 6c 69 6e |=12 . 15|...; lin|
|00000be0| 65 24 28 4c 25 29 3d c4 | 32 30 2c 22 20 22 29 2b |e$(L%)=.|20," ")+|
|00000bf0| 68 61 6e 64 24 28 30 2c | 53 25 29 2b c4 33 30 2d |hand$(0,|S%)+.30-|
|00000c00| a9 28 68 61 6e 64 24 28 | 30 2c 53 25 29 29 2c 22 |.(hand$(|0,S%)),"|
|00000c10| 20 22 29 0d 05 d2 0a 20 | 53 25 2d 3d 31 0d 05 dc | ").... |S%-=1...|
|00000c20| 08 ed 20 4c 25 0d 05 e6 | 05 3a 0d 05 f0 15 6c 69 |.. L%...|.:....li|
|00000c30| 6e 65 24 28 36 29 3d c4 | 35 30 2c 22 20 22 29 0d |ne$(6)=.|50," ").|
|00000c40| 05 fa 16 6c 69 6e 65 24 | 28 31 31 29 3d c4 35 30 |...line$|(11)=.50|
|00000c50| 2c 22 20 22 29 0d 06 04 | 16 6c 69 6e 65 24 28 31 |," ")...|.line$(1|
|00000c60| 36 29 3d c4 35 30 2c 22 | 20 22 29 0d 06 0e 05 3a |6)=.50,"| ")....:|
|00000c70| 0d 06 18 0d 6c 69 6e 65 | 73 25 3d 31 36 0d 06 22 |....line|s%=16.."|
|00000c80| 05 3a 0d 06 2c 18 62 69 | 64 73 25 3d bb 28 73 6f |.:..,.bi|ds%=.(so|
|00000c90| 75 72 63 65 24 28 39 33 | 29 29 0d 06 36 0f e7 20 |urce$(93|))..6.. |
|00000ca0| 62 69 64 73 25 3e 30 20 | 8c 0d 06 40 16 20 64 25 |bids%>0 |...@. d%|
|00000cb0| 3d bb 28 73 6f 75 72 63 | 65 24 28 37 35 29 29 0d |=.(sourc|e$(75)).|
|00000cc0| 06 4a 58 20 6c 69 6e 65 | 24 28 31 37 29 3d 22 20 |.JX line|$(17)=" |
|00000cd0| 42 69 64 64 69 6e 67 3a | 2d 20 20 20 22 2b 70 24 |Bidding:|- "+p$|
|00000ce0| 28 64 25 29 2b 22 20 22 | 2b 70 24 28 28 64 25 2b |(d%)+" "|+p$((d%+|
|00000cf0| 31 29 83 34 29 2b 22 20 | 22 2b 70 24 28 28 64 25 |1).4)+" |"+p$((d%|
|00000d00| 2b 32 29 83 34 29 2b 22 | 20 22 2b 70 24 28 28 64 |+2).4)+"| "+p$((d|
|00000d10| 25 2b 33 29 83 34 29 0d | 06 54 2a 20 6c 69 6e 65 |%+3).4).|.T* line|
|00000d20| 24 28 31 38 29 3d 22 20 | 20 20 20 20 20 20 20 20 |$(18)=" | |
|00000d30| 20 20 20 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ----|--------|
|00000d40| 22 0d 06 5e 05 3a 0d 06 | 68 09 20 4b 25 3d 30 0d |"..^.:..|h. K%=0.|
|00000d50| 06 72 10 20 c8 95 20 4b | 25 3c 62 69 64 73 25 0d |.r. .. K|%<bids%.|
|00000d60| 06 7c 2d 20 20 e7 20 28 | 4b 25 83 34 29 3d 30 20 |.|- . (|K%.4)=0 |
|00000d70| 8c 20 6c 69 6e 65 24 28 | 31 39 2b 28 4b 25 81 34 |. line$(|19+(K%.4|
|00000d80| 29 29 2b 3d c4 31 33 2c | 22 20 22 29 0d 06 86 1a |))+=.13,|" ")....|
|00000d90| 20 20 42 25 3d bb 28 73 | 6f 75 72 63 65 24 28 39 | B%=.(s|ource$(9|
|00000da0| 34 2b 4b 25 29 29 0d 06 | 90 2a 20 20 e7 20 42 25 |4+K%))..|.* . B%|
|00000db0| 3e 2d 33 20 8c 20 6c 69 | 6e 65 24 28 31 39 2b 28 |>-3 . li|ne$(19+(|
|00000dc0| 4b 25 81 34 29 29 2b 3d | 62 24 28 42 25 2b 32 29 |K%.4))+=|b$(B%+2)|
|00000dd0| 0d 06 9a 0b 20 20 4b 25 | 2b 3d 31 0d 06 a4 06 20 |.... K%|+=1.... |
|00000de0| ce 0d 06 ae 05 3a 0d 06 | b8 17 20 6c 69 6e 65 73 |.....:..|.. lines|
|00000df0| 25 3d 32 30 2b 28 4b 25 | 20 81 20 34 29 0d 06 c2 |%=20+(K%| . 4)...|
|00000e00| 05 3a 0d 06 cc 10 20 4b | 25 3d 39 38 2b 62 69 64 |.:.... K|%=98+bid|
|00000e10| 73 25 0d 06 d6 1b 20 70 | 6c 61 79 65 72 25 3d bb |s%.... p|layer%=.|
|00000e20| 28 73 6f 75 72 63 65 24 | 28 4b 25 29 29 0d 06 e0 |(source$|(K%))...|
|00000e30| 0a 20 4b 25 2b 3d 32 0d | 06 ea 21 20 63 61 72 64 |. K%+=2.|..! card|
|00000e40| 73 5f 70 6c 61 79 65 64 | 25 3d bb 28 73 6f 75 72 |s_played|%=.(sour|
|00000e50| 63 65 24 28 4b 25 29 29 | 0d 06 f4 0a 20 4b 25 2b |ce$(K%))|.... K%+|
|00000e60| 3d 32 0d 06 fe 26 20 65 | 77 72 65 73 75 6c 74 5f |=2...& e|wresult_|
|00000e70| 70 74 72 25 3d 4b 25 2b | 31 2b bb 28 73 6f 75 72 |ptr%=K%+|1+.(sour|
|00000e80| 63 65 24 28 4b 25 29 29 | 0d 07 08 18 20 e7 20 63 |ce$(K%))|.... . c|
|00000e90| 61 72 64 73 5f 70 6c 61 | 79 65 64 25 3e 30 20 8c |ards_pla|yed%>0 .|
|00000ea0| 0d 07 12 1c 20 20 6c 61 | 73 74 25 3d 4b 25 2b 63 |.... la|st%=K%+c|
|00000eb0| 61 72 64 73 5f 70 6c 61 | 79 65 64 25 0d 07 1c 32 |ards_pla|yed%...2|
|00000ec0| 20 20 6c 69 6e 65 24 28 | 31 29 2b 3d c4 35 30 2d | line$(|1)+=.50-|
|00000ed0| a9 28 6c 69 6e 65 24 28 | 31 29 29 2c 22 20 22 29 |.(line$(|1))," ")|
|00000ee0| 2b 22 43 61 72 64 20 70 | 6c 61 79 3a 2d 22 0d 07 |+"Card p|lay:-"..|
|00000ef0| 26 1f 20 20 6c 69 6e 65 | 24 28 32 29 2b 3d 22 20 |&. line|$(2)+=" |
|00000f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 22 0d 07 30 |--------|----"..0|
|00000f10| 0a 20 20 4c 25 3d 33 0d | 07 3a 0a 20 20 4a 25 3d |. L%=3.|.:. J%=|
|00000f20| 30 0d 07 44 07 20 20 f5 | 0d 07 4e 1e 20 20 20 4b |0..D. .|..N. K|
|00000f30| 25 2b 3d 31 3a 41 25 3d | bb 28 73 6f 75 72 63 65 |%+=1:A%=|.(source|
|00000f40| 24 28 4b 25 29 29 0d 07 | 58 3e 20 20 20 e7 20 41 |$(K%))..|X> . A|
|00000f50| 25 3e 30 20 8c 20 6c 69 | 6e 65 24 28 4c 25 29 2b |%>0 . li|ne$(L%)+|
|00000f60| 3d 63 24 28 28 41 25 2d | 31 29 20 83 20 31 33 29 |=c$((A%-|1) . 13)|
|00000f70| 2b c0 73 24 28 28 41 25 | 2d 31 29 20 81 20 31 33 |+.s$((A%|-1) . 13|
|00000f80| 29 2c 31 29 0d 07 62 20 | 20 20 20 4a 25 2b 3d 31 |),1)..b | J%+=1|
|00000f90| 3a e7 20 4a 25 3d 34 20 | 8c 20 4a 25 3d 30 3a 4c |:. J%=4 |. J%=0:L|
|00000fa0| 25 2b 3d 31 0d 07 6c 10 | 20 20 fd 20 4b 25 3d 6c |%+=1..l.| . K%=l|
|00000fb0| 61 73 74 25 0d 07 76 2c | 20 20 e7 20 4c 25 3c 31 |ast%..v,| . L%<1|
|00000fc0| 36 20 8c 20 6c 69 6e 65 | 24 28 4c 25 2b 31 29 2b |6 . line|$(L%+1)+|
|00000fd0| 3d 22 20 52 65 73 74 20 | 43 6c 61 69 6d 65 64 22 |=" Rest |Claimed"|
|00000fe0| 0d 07 80 25 20 20 65 77 | 74 72 69 63 6b 24 3d 73 |...% ew|trick$=s|
|00000ff0| 6f 75 72 63 65 24 28 65 | 77 72 65 73 75 6c 74 5f |ource$(e|wresult_|
|00001000| 70 74 72 25 29 0d 07 8a | 27 20 20 6e 73 74 72 69 |ptr%)...|' nstri|
|00001010| 63 6b 24 3d 73 6f 75 72 | 63 65 24 28 65 77 72 65 |ck$=sour|ce$(ewre|
|00001020| 73 75 6c 74 5f 70 74 72 | 25 2b 31 29 0d 07 94 31 |sult_ptr|%+1)...1|
|00001030| 20 20 6c 69 6e 65 24 28 | 31 37 29 2b 3d c4 35 30 | line$(|17)+=.50|
|00001040| 2d a9 28 6c 69 6e 65 24 | 28 31 37 29 29 2c 22 20 |-.(line$|(17))," |
|00001050| 22 29 2b 22 52 65 73 75 | 6c 74 3a 2d 22 0d 07 9e |")+"Resu|lt:-"...|
|00001060| 35 20 20 6c 69 6e 65 24 | 28 31 38 29 2b 3d c4 35 |5 line$|(18)+=.5|
|00001070| 30 2d a9 28 6c 69 6e 65 | 24 28 31 38 29 29 2c 22 |0-.(line|$(18)),"|
|00001080| 20 22 29 2b 22 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ")+"---|--------|
|00001090| 2d 22 0d 07 a8 26 20 20 | 6c 69 6e 65 24 28 31 39 |-"...& |line$(19|
|000010a0| 29 2b 3d c4 35 30 2d a9 | 28 6c 69 6e 65 24 28 31 |)+=.50-.|(line$(1|
|000010b0| 39 29 29 2c 22 20 22 29 | 0d 07 b2 26 20 20 6c 69 |9))," ")|...& li|
|000010c0| 6e 65 24 28 32 30 29 2b | 3d c4 35 30 2d a9 28 6c |ne$(20)+|=.50-.(l|
|000010d0| 69 6e 65 24 28 32 30 29 | 29 2c 22 20 22 29 0d 07 |ine$(20)|)," ")..|
|000010e0| bc 16 20 20 70 25 3d 28 | 70 6c 61 79 65 72 25 20 |.. p%=(|player% |
|000010f0| 83 20 32 29 0d 07 c6 2d | 20 20 6c 69 6e 65 24 28 |. 2)...-| line$(|
|00001100| 31 39 2b 70 25 29 2b 3d | 22 4e 2f 53 20 22 2b 6e |19+p%)+=|"N/S "+n|
|00001110| 73 74 72 69 63 6b 24 2b | 22 20 74 72 69 63 6b 73 |strick$+|" tricks|
|00001120| 22 0d 07 d0 2d 20 20 6c | 69 6e 65 24 28 32 30 2d |"...- l|ine$(20-|
|00001130| 70 25 29 2b 3d 22 45 2f | 57 20 22 2b 65 77 74 72 |p%)+="E/|W "+ewtr|
|00001140| 69 63 6b 24 2b 22 20 74 | 72 69 63 6b 73 22 0d 07 |ick$+" t|ricks"..|
|00001150| da 06 20 cd 0d 07 e4 05 | cd 0d 07 ee 05 e1 0d 07 |.. .....|........|
|00001160| f8 05 3a 0d 08 02 0c dd | f2 72 65 64 72 61 77 0d |..:.....|.redraw.|
|00001170| 08 0c 12 21 62 6c 6f 63 | 6b 25 3d 77 6c 69 73 74 |...!bloc|k%=wlist|
|00001180| 25 0d 08 16 29 c8 99 20 | 22 57 69 6d 70 5f 52 65 |%...).. |"Wimp_Re|
|00001190| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |drawWind|ow",,blo|
|000011a0| 63 6b 25 20 b8 20 6d 6f | 72 65 0d 08 20 05 3a 0d |ck% . mo|re.. .:.|
|000011b0| 08 2a 1d 78 30 25 3d 31 | 36 2b 62 6c 6f 63 6b 25 |.*.x0%=1|6+block%|
|000011c0| 21 34 2d 62 6c 6f 63 6b | 25 21 32 30 0d 08 34 1f |!4-block|%!20..4.|
|000011d0| 79 30 25 3d 2d 31 36 2b | 62 6c 6f 63 6b 25 21 31 |y0%=-16+|block%!1|
|000011e0| 36 2d 62 6c 6f 63 6b 25 | 21 32 34 0d 08 3e 0b c8 |6-block%|!24..>..|
|000011f0| 95 20 6d 6f 72 65 0d 08 | 48 1e 20 74 6f 70 25 3d |. more..|H. top%=|
|00001200| 28 79 30 25 2d 62 6c 6f | 63 6b 25 21 34 30 29 20 |(y0%-blo|ck%!40) |
|00001210| 81 20 33 36 0d 08 52 16 | 20 e7 20 74 6f 70 25 3c |. 36..R.| . top%<|
|00001220| 30 20 8c 20 74 6f 70 25 | 3d 30 0d 08 5c 22 20 62 |0 . top%|=0..\" b|
|00001230| 61 73 65 25 3d 28 34 37 | 2b 79 30 25 2d 62 6c 6f |ase%=(47|+y0%-blo|
|00001240| 63 6b 25 21 33 32 29 20 | 81 20 33 36 0d 08 66 0c |ck%!32) |. 36..f.|
|00001250| 20 69 25 3d 74 6f 70 25 | 0d 08 70 1d 20 c8 95 20 | i%=top%|..p. .. |
|00001260| 69 25 3c 6c 69 6e 65 73 | 25 20 80 20 69 25 3c 3d |i%<lines|% . i%<=|
|00001270| 62 61 73 65 25 0d 08 7a | 17 20 20 ec 20 78 30 25 |base%..z|. . x0%|
|00001280| 2c 79 30 25 2d 28 69 25 | 3c 3c 35 29 0d 08 84 11 |,y0%-(i%|<<5)....|
|00001290| 20 20 f1 20 6c 69 6e 65 | 24 28 69 25 29 0d 08 8e | . line|$(i%)...|
|000012a0| 0b 20 20 69 25 2b 3d 31 | 0d 08 98 06 20 ce 0d 08 |. i%+=1|.... ...|
|000012b0| a2 2a 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 52 |.* .. "W|imp_GetR|
|000012c0| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 62 6c 6f 63 6b |ectangle|",,block|
|000012d0| 25 20 b8 20 6d 6f 72 65 | 0d 08 ac 05 ce 0d 08 b6 |% . more|........|
|000012e0| 05 e1 0d 08 c0 05 3a 0d | 08 ca 1b dd f2 75 70 64 |......:.|.....upd|
|000012f0| 61 74 65 5f 77 69 6e 64 | 6f 77 28 68 61 6e 64 6c |ate_wind|ow(handl|
|00001300| 65 29 0d 08 d4 12 21 62 | 6c 6f 63 6b 25 3d 68 61 |e)....!b|lock%=ha|
|00001310| 6e 64 6c 65 0d 08 de 24 | c8 99 20 22 57 69 6d 70 |ndle...$|.. "Wimp|
|00001320| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00001330| 2c 2c 62 6c 6f 63 6b 25 | 0d 08 e8 22 c8 99 20 22 |,,block%|...".. "|
|00001340| 57 69 6d 70 5f 55 70 64 | 61 74 65 57 69 6e 64 6f |Wimp_Upd|ateWindo|
|00001350| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 08 f2 11 f2 77 |w",,bloc|k%.....w|
|00001360| 68 69 63 68 5f 77 69 6e | 64 6f 77 0d 08 fc 05 e1 |hich_win|dow.....|
|00001370| 0d 09 06 05 3a 0d 09 10 | 1b dd a4 63 72 65 61 74 |....:...|...creat|
|00001380| 65 5f 77 69 6e 64 6f 77 | 28 62 6c 6f 63 6b 25 29 |e_window|(block%)|
|00001390| 0d 09 1a 0d ea 20 68 61 | 6e 64 6c 65 25 0d 09 24 |..... ha|ndle%..$|
|000013a0| 3c 62 6c 6f 63 6b 25 21 | 30 3d 32 30 30 20 20 20 |<block%!|0=200 |
|000013b0| 20 20 20 20 20 20 20 3a | 20 f4 20 76 69 73 69 62 | :| . visib|
|000013c0| 6c 65 20 61 72 65 61 20 | 78 20 6d 69 6e 20 2d 20 |le area |x min - |
|000013d0| 70 61 67 65 20 31 31 33 | 31 0d 09 2e 30 62 6c 6f |page 113|1...0blo|
|000013e0| 63 6b 25 21 34 3d 31 30 | 30 20 20 20 20 20 20 20 |ck%!4=10|0 |
|000013f0| 20 20 20 3a 20 f4 20 76 | 69 73 69 62 6c 65 20 61 | : . v|isible a|
|00001400| 72 65 61 20 79 20 6d 69 | 6e 0d 09 38 30 62 6c 6f |rea y mi|n..80blo|
|00001410| 63 6b 25 21 38 3d 35 30 | 30 20 20 20 20 20 20 20 |ck%!8=50|0 |
|00001420| 20 20 20 3a 20 f4 20 76 | 69 73 69 62 6c 65 20 61 | : . v|isible a|
|00001430| 72 65 61 20 78 20 6d 61 | 78 0d 09 42 30 62 6c 6f |rea x ma|x..B0blo|
|00001440| 63 6b 25 21 31 32 3d 34 | 30 30 20 20 20 20 20 20 |ck%!12=4|00 |
|00001450| 20 20 20 3a 20 f4 20 76 | 69 73 69 62 6c 65 20 61 | : . v|isible a|
|00001460| 72 65 61 20 79 20 6d 61 | 78 0d 09 4c 2d 62 6c 6f |rea y ma|x..L-blo|
|00001470| 63 6b 25 21 31 36 3d 30 | 20 20 20 20 20 20 20 20 |ck%!16=0| |
|00001480| 20 20 20 3a 20 f4 20 73 | 63 72 6f 6c 6c 20 78 20 | : . s|croll x |
|00001490| 6f 66 66 73 65 74 0d 09 | 56 2d 62 6c 6f 63 6b 25 |offset..|V-block%|
|000014a0| 21 32 30 3d 30 20 20 20 | 20 20 20 20 20 20 20 20 |!20=0 | |
|000014b0| 3a 20 f4 20 73 63 72 6f | 6c 6c 20 79 20 6f 66 66 |: . scro|ll y off|
|000014c0| 73 65 74 0d 09 60 21 62 | 6c 6f 63 6b 25 21 32 34 |set..`!b|lock%!24|
|000014d0| 3d 2d 31 20 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |=-1 | : .|
|000014e0| 20 74 6f 70 0d 09 6a 2a | 62 6c 6f 63 6b 25 21 32 | top..j*|block%!2|
|000014f0| 38 3d 26 46 46 30 30 30 | 31 30 32 20 20 20 3a 20 |8=&FF000|102 : |
|00001500| f4 20 77 69 6e 64 6f 77 | 20 66 6c 61 67 73 0d 09 |. window| flags..|
|00001510| 74 35 62 6c 6f 63 6b 25 | 3f 33 32 3d 37 20 20 20 |t5block%|?32=7 |
|00001520| 20 20 20 20 20 20 20 20 | 3a 20 f4 20 74 69 74 6c | |: . titl|
|00001530| 65 20 66 6f 72 65 67 72 | 6f 75 6e 64 20 63 6f 6c |e foregr|ound col|
|00001540| 6f 75 72 0d 09 7e 34 62 | 6c 6f 63 6b 25 3f 33 33 |our..~4b|lock%?33|
|00001550| 3d 32 20 20 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |=2 | : .|
|00001560| 20 74 69 74 6c 65 20 62 | 61 63 6b 67 6f 75 6e 64 | title b|ackgound|
|00001570| 20 63 6f 6c 6f 75 72 0d | 09 88 39 62 6c 6f 63 6b | colour.|..9block|
|00001580| 25 3f 33 34 3d 37 20 20 | 20 20 20 20 20 20 20 20 |%?34=7 | |
|00001590| 20 3a 20 f4 20 77 6f 72 | 6b 20 61 72 65 61 20 66 | : . wor|k area f|
|000015a0| 6f 72 65 67 72 6f 75 6e | 64 20 63 6f 6c 6f 75 72 |oregroun|d colour|
|000015b0| 0d 09 92 39 62 6c 6f 63 | 6b 25 3f 33 35 3d 30 20 |...9bloc|k%?35=0 |
|000015c0| 20 20 20 20 20 20 20 20 | 20 20 3a 20 f4 20 77 6f | | : . wo|
|000015d0| 72 6b 20 61 72 65 61 20 | 62 61 63 6b 67 72 6f 75 |rk area |backgrou|
|000015e0| 6e 64 20 63 6f 6c 6f 75 | 72 0d 09 9c 35 62 6c 6f |nd colou|r...5blo|
|000015f0| 63 6b 25 3f 33 36 3d 32 | 20 20 20 20 20 20 20 20 |ck%?36=2| |
|00001600| 20 20 20 3a 20 f4 20 73 | 63 72 6f 6c 6c 20 62 61 | : . s|croll ba|
|00001610| 72 20 6f 75 74 65 72 20 | 63 6f 6c 6f 75 72 0d 09 |r outer |colour..|
|00001620| a6 35 62 6c 6f 63 6b 25 | 3f 33 37 3d 30 20 20 20 |.5block%|?37=0 |
|00001630| 20 20 20 20 20 20 20 20 | 3a 20 f4 20 73 63 72 6f | |: . scro|
|00001640| 6c 6c 20 62 61 72 20 69 | 6e 6e 65 72 20 63 6f 6c |ll bar i|nner col|
|00001650| 6f 75 72 0d 09 b0 3f 62 | 6c 6f 63 6b 25 3f 33 38 |our...?b|lock%?38|
|00001660| 3d 32 20 20 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |=2 | : .|
|00001670| 20 74 69 74 6c 65 20 62 | 61 63 6b 67 72 6f 75 6e | title b|ackgroun|
|00001680| 64 20 63 6f 6c 6f 75 72 | 20 66 6f 72 20 69 6e 70 |d colour| for inp|
|00001690| 75 74 0d 09 ba 26 62 6c | 6f 63 6b 25 3f 33 39 3d |ut...&bl|ock%?39=|
|000016a0| 30 20 20 20 20 20 20 20 | 20 20 20 20 3a 20 f4 20 |0 | : . |
|000016b0| 72 65 73 65 72 76 65 64 | 0d 09 c4 05 3a 0d 09 ce |reserved|....:...|
|000016c0| 2d 62 6c 6f 63 6b 25 21 | 34 30 3d 30 20 20 20 20 |-block%!|40=0 |
|000016d0| 20 20 20 20 20 20 20 3a | 20 f4 20 77 6f 72 6b 20 | :| . work |
|000016e0| 61 72 65 61 20 6d 69 6e | 20 78 0d 09 d8 2d 62 6c |area min| x...-bl|
|000016f0| 6f 63 6b 25 21 34 34 3d | 2d 39 30 30 20 20 20 20 |ock%!44=|-900 |
|00001700| 20 20 20 20 3a 20 f4 20 | 77 6f 72 6b 20 61 72 65 | : . |work are|
|00001710| 61 20 6d 69 6e 20 79 0d | 09 e2 2d 62 6c 6f 63 6b |a min y.|..-block|
|00001720| 25 21 34 38 3d 31 31 30 | 30 20 20 20 20 20 20 20 |%!48=110|0 |
|00001730| 20 3a 20 f4 20 77 6f 72 | 6b 20 61 72 65 61 20 6d | : . wor|k area m|
|00001740| 61 78 20 78 0d 09 ec 2d | 62 6c 6f 63 6b 25 21 35 |ax x...-|block%!5|
|00001750| 32 3d 30 20 20 20 20 20 | 20 20 20 20 20 20 3a 20 |2=0 | : |
|00001760| f4 20 77 6f 72 6b 20 61 | 72 65 61 20 6d 61 78 20 |. work a|rea max |
|00001770| 79 0d 09 f6 43 62 6c 6f | 63 6b 25 21 35 36 3d 26 |y...Cblo|ck%!56=&|
|00001780| 31 31 39 20 20 20 20 20 | 20 20 20 3a 20 f4 20 74 |119 | : . t|
|00001790| 69 74 6c 65 20 66 6c 61 | 67 73 20 28 74 65 78 74 |itle fla|gs (text|
|000017a0| 20 69 6e 64 69 72 2e 2b | 63 65 6e 74 72 65 64 20 | indir.+|centred |
|000017b0| 76 26 68 29 0d 0a 00 40 | 62 6c 6f 63 6b 25 21 36 |v&h)...@|block%!6|
|000017c0| 30 3d 33 3c 3c 31 32 20 | 20 20 20 20 20 20 3a 20 |0=3<<12 | : |
|000017d0| f4 20 77 6f 72 6b 20 61 | 72 65 61 20 62 75 74 74 |. work a|rea butt|
|000017e0| 6f 6e 20 66 6c 61 67 73 | 20 62 75 74 74 6f 6e 25 |on flags| button%|
|000017f0| 3c 3c 31 32 0d 0a 0a 3f | 62 6c 6f 63 6b 25 21 36 |<<12...?|block%!6|
|00001800| 34 3d 31 20 20 20 20 20 | 20 20 20 20 20 20 3a 20 |4=1 | : |
|00001810| f4 20 73 70 72 69 74 65 | 20 61 72 65 61 20 63 6f |. sprite| area co|
|00001820| 6e 74 72 6f 6c 20 62 6c | 6f 63 6b 20 70 6f 69 6e |ntrol bl|ock poin|
|00001830| 74 65 72 0d 0a 14 39 62 | 6c 6f 63 6b 25 3f 36 38 |ter...9b|lock%?68|
|00001840| 3d 30 20 20 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |=0 | : .|
|00001850| 20 6d 69 6e 2e 20 77 69 | 6e 64 6f 77 20 77 69 64 | min. wi|ndow wid|
|00001860| 74 68 20 2d 20 4c 53 20 | 62 79 74 65 0d 0a 1e 39 |th - LS |byte...9|
|00001870| 62 6c 6f 63 6b 25 3f 36 | 39 3d 30 20 20 20 20 20 |block%?6|9=0 |
|00001880| 20 20 20 20 20 20 3a 20 | f4 20 6d 69 6e 2e 20 77 | : |. min. w|
|00001890| 69 6e 64 6f 77 20 77 69 | 64 74 68 20 2d 20 4d 53 |indow wi|dth - MS|
|000018a0| 20 62 79 74 65 0d 0a 28 | 3a 62 6c 6f 63 6b 25 3f | byte..(|:block%?|
|000018b0| 37 30 3d 30 20 20 20 20 | 20 20 20 20 20 20 20 3a |70=0 | :|
|000018c0| 20 f4 20 6d 69 6e 2e 20 | 77 69 6e 64 6f 77 20 68 | . min. |window h|
|000018d0| 65 69 67 68 74 20 2d 20 | 4c 53 20 62 79 74 65 0d |eight - |LS byte.|
|000018e0| 0a 32 3a 62 6c 6f 63 6b | 25 3f 37 31 3d 30 20 20 |.2:block|%?71=0 |
|000018f0| 20 20 20 20 20 20 20 20 | 20 3a 20 f4 20 6d 69 6e | | : . min|
|00001900| 2e 20 77 69 6e 64 6f 77 | 20 68 65 69 67 68 74 20 |. window| height |
|00001910| 2d 20 4c 53 20 62 79 74 | 65 0d 0a 3c 29 62 6c 6f |- LS byt|e..<)blo|
|00001920| 63 6b 25 21 37 32 3d 74 | 78 25 20 20 20 20 20 20 |ck%!72=t|x% |
|00001930| 20 20 20 3a 20 f4 20 74 | 65 78 74 20 62 75 66 66 | : . t|ext buff|
|00001940| 65 72 0d 0a 46 32 62 6c | 6f 63 6b 25 21 37 36 3d |er..F2bl|ock%!76=|
|00001950| 2d 31 20 20 20 20 20 20 | 20 20 20 20 3a 20 f4 20 |-1 | : . |
|00001960| 6e 6f 20 76 61 6c 69 64 | 61 74 69 6f 6e 20 73 74 |no valid|ation st|
|00001970| 72 69 6e 67 0d 0a 50 2b | 62 6c 6f 63 6b 25 21 38 |ring..P+|block%!8|
|00001980| 30 3d 33 32 20 20 20 20 | 20 20 20 20 20 20 3a 20 |0=32 | : |
|00001990| f4 20 62 75 66 66 65 72 | 20 6c 65 6e 67 74 68 0d |. buffer| length.|
|000019a0| 0a 5a 24 24 74 78 25 20 | 3d 20 22 4f 6d 61 72 20 |.Z$$tx% |= "Omar |
|000019b0| 53 68 61 72 69 66 20 42 | 72 69 64 67 65 20 48 61 |Sharif B|ridge Ha|
|000019c0| 6e 64 22 0d 0a 64 05 3a | 0d 0a 6e 0f 62 6c 6f 63 |nd"..d.:|..n.bloc|
|000019d0| 6b 25 21 38 34 3d 30 0d | 0a 78 2c c8 99 20 22 57 |k%!84=0.|.x,.. "W|
|000019e0| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|000019f0| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 68 61 6e 64 |",,block|% . hand|
|00001a00| 6c 65 25 0d 0a 82 0c 3d | 68 61 6e 64 6c 65 25 0d |le%....=|handle%.|
|00001a10| 0a 8c 05 3a 0d 0a 96 0f | dd a4 77 69 6d 70 65 72 |...:....|..wimper|
|00001a20| 72 6f 72 0d 0a a0 0e 21 | 65 72 72 5f 62 6c 6b 3d |ror....!|err_blk=|
|00001a30| 9f 0d 0a aa 25 24 28 65 | 72 72 5f 62 6c 6b 2b 34 |....%$(e|rr_blk+4|
|00001a40| 29 3d f6 24 2b 22 20 61 | 74 20 6c 69 6e 65 20 22 |)=.$+" a|t line "|
|00001a50| 2b c3 9e 2b bd 30 0d 0a | b4 3d c8 99 20 22 57 69 |+..+.0..|.=.. "Wi|
|00001a60| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00001a70| 65 72 72 5f 62 6c 6b 2c | 33 2c 22 53 68 6f 77 20 |err_blk,|3,"Show |
|00001a80| 48 61 6e 64 73 22 20 b8 | 20 2c 72 65 73 70 6f 6e |Hands" .| ,respon|
|00001a90| 73 65 25 0d 0a be 43 f4 | 49 46 20 72 65 73 70 6f |se%...C.|IF respo|
|00001aa0| 6e 73 65 25 3d 32 20 54 | 48 45 4e 20 50 52 4f 43 |nse%=2 T|HEN PROC|
|00001ab0| 63 6c 6f 73 65 5f 77 69 | 6e 64 6f 77 28 77 6c 69 |close_wi|ndow(wli|
|00001ac0| 73 74 25 29 3a 3d 54 52 | 55 45 20 45 4c 53 45 20 |st%):=TR|UE ELSE |
|00001ad0| 3d 46 41 4c 53 45 0d 0a | c8 06 3d b9 0d 0a d2 05 |=FALSE..|..=.....|
|00001ae0| 3a 0d 0a dc 0d dd f2 70 | 72 6f 63 65 73 73 0d 0a |:......p|rocess..|
|00001af0| e6 11 ea 20 41 25 2c 4c | 25 2c 50 25 2c 41 24 0d |... A%,L|%,P%,A$.|
|00001b00| 0a f0 0d 4c 25 3d 30 3a | 50 25 3d 30 0d 0a fa 05 |...L%=0:|P%=0....|
|00001b10| f5 0d 0b 04 0a 20 41 24 | 3d 22 22 0d 0b 0e 06 20 |..... A$|="".... |
|00001b20| f5 0d 0b 18 13 20 20 41 | 25 3d 73 6f 75 72 63 65 |..... A|%=source|
|00001b30| 25 3f 50 25 0d 0b 22 0b | 20 20 50 25 2b 3d 31 0d |%?P%..".| P%+=1.|
|00001b40| 0b 2c 19 20 20 e7 20 41 | 25 3e 31 33 20 8c 20 41 |.,. . A|%>13 . A|
|00001b50| 24 2b 3d bd 28 41 25 29 | 0d 0b 36 18 20 fd 20 41 |$+=.(A%)|..6. . A|
|00001b60| 25 3c 3d 31 33 20 84 20 | 50 25 3e 3d 6c 65 6e 25 |%<=13 . |P%>=len%|
|00001b70| 0d 0b 40 13 20 73 6f 75 | 72 63 65 24 28 4c 25 29 |..@. sou|rce$(L%)|
|00001b80| 3d 41 24 0d 0b 4a 0a 20 | 4c 25 2b 3d 31 0d 0b 54 |=A$..J. |L%+=1..T|
|00001b90| 0e fd 20 50 25 3e 3d 6c | 65 6e 25 0d 0b 5e 05 e1 |.. P%>=l|en%..^..|
|00001ba0| 0d 0b 68 05 3a 0d 0b 72 | 10 dd a4 63 6f 6e 76 28 |..h.:..r|...conv(|
|00001bb0| 62 6c 6b 25 29 0d 0b 7c | 0b ea 20 41 25 2c 46 24 |blk%)..||.. A%,F$|
|00001bc0| 0d 0b 86 09 46 24 3d 22 | 22 0d 0b 90 05 f5 0d 0b |....F$="|".......|
|00001bd0| 9a 0d 20 41 25 3d 3f 62 | 6c 6b 25 0d 0b a4 0c 20 |.. A%=?b|lk%.... |
|00001be0| 62 6c 6b 25 2b 3d 31 0d | 0b ae 18 20 e7 20 41 25 |blk%+=1.|... . A%|
|00001bf0| 3c 3e 30 20 8c 20 46 24 | 2b 3d bd 28 41 25 29 0d |<>0 . F$|+=.(A%).|
|00001c00| 0b b8 0a fd 20 41 25 3d | 30 0d 0b c2 07 3d 46 24 |.... A%=|0....=F$|
|00001c10| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
